Proceso sumar_numeros
	acumula<-0;
	Escribir "EScribe un numero:";
	Leer numero;
	Mientras acumula <10 Hacer
		acumula<-acumula + numero;
		Escribir acumula;
	FinMientras
	Escribir "El resultado es:", acumula;
FinProceso
